home *** CD-ROM | disk | FTP | other *** search
- #[document 56.9 179.1 155.35 208.85
- static oe="odd_even",nzw="nonzero_winding",wc="winding_counting";
- static stroked="stroked";
- static vert="vertical",horz="horizontal";
- static miter="miter",bevel="bevel",round="round";
- static butt="butt",proj="projected";
- #[page
- auto m=move,l=line,c=curve;
- auto p;
- gc_cspace("Lab");
- gc_color(100.0,0.0,0.0);
- rect(0,0,0,0);
- auto ng=draw(path());
- auto s=array(ng);
- m(103.00,195.10);
- c(102.00,192.35,100.90,189.70,99.70,187.05);
- c(99.35,186.30,99.35,185.45,99.70,184.65);
- c(100.10,183.80,101.40,183.55,102.25,183.55);
- c(107.35,183.55,112.45,183.70,117.55,183.60);
- c(118.10,183.60,118.80,183.60,119.10,184.05);
- c(119.60,184.85,120.35,186.60,120.45,186.55);
- c(120.35,186.60,105.30,186.55,105.25,186.50);
- c(104.85,186.55,104.35,186.80,104.35,187.20);
- c(104.35,187.45,104.80,187.80,104.75,187.85);
- c(104.80,187.80,108.55,187.80,110.50,187.85);
- c(110.95,187.80,111.60,187.95,111.75,188.45);
- c(112.45,190.35,113.25,192.25,114.00,194.20);
- c(114.10,194.50,113.85,195.00,113.80,195.30);
- c(113.50,196.15,112.35,196.75,111.50,196.75);
- c(109.95,196.75,108.45,196.75,106.85,196.75);
- c(105.85,196.75,104.80,196.90,103.95,196.35);
- c(103.55,196.00,103.10,195.65,103.00,195.10);
- close_edge();
- m(106.80,193.15);
- c(106.30,192.25,106.05,191.25,105.55,190.25);
- c(105.55,190.10,105.60,189.95,105.80,189.95);
- c(106.55,189.95,107.70,189.70,107.95,190.40);
- c(108.30,191.25,108.70,192.00,108.95,192.85);
- c(109.05,193.00,108.95,193.35,108.80,193.30);
- c(108.30,193.35,107.80,193.35,107.35,193.35);
- c(107.20,193.35,106.95,193.35,106.80,193.15);
- close_edge();
- p=path();
- gc_draw_style(oe);
- gc_color(100.00,0.00,0.01);
- s[0]=draw(p);
- m(111.75,186.55);
- c(111.70,186.55,114.10,186.55,115.25,186.55);
- c(115.50,186.55,115.60,186.95,115.75,187.25);
- c(117.00,190.35,118.35,193.50,119.75,196.55);
- c(120.60,196.50,121.55,196.65,122.35,196.55);
- c(122.95,196.50,123.45,196.50,123.85,196.20);
- c(124.05,196.00,124.05,195.25,124.00,195.30);
- c(124.45,195.75,124.85,196.00,125.35,196.30);
- c(125.95,196.65,126.70,196.50,127.35,196.55);
- c(128.25,196.50,129.00,196.50,129.70,196.55);
- c(130.25,196.50,130.85,196.40,131.20,195.95);
- c(131.60,195.40,131.35,194.50,131.20,193.80);
- c(130.30,191.60,129.25,189.45,128.30,187.25);
- c(128.30,187.20,128.30,187.05,128.50,186.95);
- c(128.75,186.70,129.05,186.70,129.35,186.75);
- c(131.50,186.80,135.55,186.80,135.55,186.80);
- c(135.30,186.20,135.05,185.70,134.85,185.05);
- c(134.60,184.65,134.55,184.15,134.20,183.95);
- c(133.85,183.80,133.45,183.65,133.20,183.70);
- c(129.30,183.65,121.60,183.65,121.60,183.70);
- c(121.80,184.05,121.95,184.30,122.00,184.60);
- c(123.05,187.45,124.45,190.20,125.50,193.05);
- c(125.60,193.25,125.35,193.60,125.05,193.55);
- c(124.70,193.60,124.30,193.50,123.85,193.55);
- c(123.55,193.50,123.30,193.35,123.25,193.05);
- c(122.05,190.20,120.80,187.45,119.60,184.60);
- c(119.35,184.15,119.05,183.65,118.55,183.70);
- c(115.75,183.65,110.10,183.65,110.10,183.70);
- c(110.10,183.65,111.70,186.55,111.75,186.55);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(131.95,186.10);
- c(131.70,185.70,131.70,185.05,131.95,184.60);
- c(132.45,183.30,134.60,183.55,136.10,183.60);
- c(136.95,183.55,137.70,183.65,138.20,184.05);
- c(138.70,184.30,139.30,185.05,139.35,185.00);
- c(139.30,185.05,139.30,184.80,139.20,184.60);
- c(139.20,184.40,139.30,184.05,139.45,183.90);
- c(139.85,183.65,140.20,183.65,140.60,183.60);
- c(143.60,183.65,146.60,183.65,149.60,183.60);
- c(150.60,183.65,151.85,183.55,152.95,184.00);
- c(153.45,184.15,153.70,184.95,153.85,185.40);
- c(154.05,185.95,154.55,186.95,154.55,186.95);
- c(154.55,186.95,148.70,186.70,145.80,186.70);
- c(145.60,186.70,145.20,186.70,145.20,186.95);
- c(145.10,187.05,145.20,187.30,145.20,187.50);
- c(146.45,190.45,149.10,196.50,149.10,196.50);
- c(149.10,196.50,143.95,196.50,144.05,196.50);
- c(143.95,196.50,141.35,190.45,140.10,187.35);
- c(139.95,187.05,139.55,186.70,139.20,186.70);
- c(138.95,186.70,138.55,186.70,138.10,186.70);
- c(137.95,186.70,137.80,187.05,137.95,187.25);
- c(139.20,190.35,141.70,196.50,141.70,196.50);
- c(141.70,196.50,136.30,196.50,136.20,196.55);
- c(136.30,196.50,133.45,190.20,132.30,186.95);
- c(131.70,185.55,131.85,186.05,131.95,186.10);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(59.05,203.80);
- c(59.05,203.85,72.40,203.85,79.05,203.80);
- c(79.05,202.80,78.95,201.80,78.90,200.80);
- c(78.05,200.80,77.20,200.80,76.20,200.80);
- c(71.25,200.80,61.15,200.80,61.15,200.80);
- c(60.15,200.80,59.05,202.45,59.05,203.80);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(56.90,208.80);
- c(56.90,208.75,71.90,208.75,79.35,208.80);
- c(79.35,207.75,79.35,206.85,79.20,205.80);
- c(78.30,205.85,77.45,205.85,76.55,205.80);
- c(70.75,205.85,59.05,205.85,59.00,205.80);
- c(58.00,205.85,56.90,207.35,56.90,208.80);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(62.15,198.70);
- c(62.15,198.65,72.00,198.65,77.05,198.70);
- c(77.05,197.65,76.95,196.65,76.90,195.70);
- c(76.05,195.75,75.15,195.75,74.25,195.70);
- c(70.90,195.75,64.20,195.75,64.20,195.70);
- c(63.15,195.65,62.15,197.30,62.15,198.70);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(93.20,180.00);
- c(93.20,180.00,90.65,180.00,89.35,180.00);
- c(88.55,180.00,87.50,180.75,87.30,181.55);
- c(86.90,182.80,87.90,184.05,88.45,185.20);
- c(90.65,190.35,92.80,195.50,95.00,200.65);
- c(95.20,201.20,95.20,202.30,94.60,202.55);
- c(94.20,202.70,93.70,202.80,93.25,202.85);
- c(92.70,202.80,92.05,202.20,91.85,201.60);
- c(88.80,194.40,82.50,180.00,82.50,180.00);
- c(82.50,180.00,74.90,180.00,74.95,180.00);
- c(77.80,186.95,80.85,193.75,83.75,200.65);
- c(84.10,201.45,84.50,202.80,83.75,203.45);
- c(83.50,203.70,83.00,203.60,82.50,203.55);
- c(81.95,203.60,81.35,203.20,81.20,202.65);
- c(78.05,195.15,74.65,187.55,71.50,180.00);
- c(71.50,180.00,63.55,180.00,63.55,180.00);
- c(63.55,180.00,70.90,197.15,74.65,205.75);
- c(74.90,206.50,75.55,207.10,76.10,207.70);
- c(76.95,208.50,78.20,208.75,79.35,208.80);
- c(80.85,208.85,82.75,207.85,83.05,206.45);
- c(84.25,208.00,86.50,208.85,88.45,208.80);
- c(90.40,208.75,92.80,207.75,93.70,205.90);
- c(94.85,207.60,97.10,208.75,99.10,208.80);
- c(101.15,208.75,104.05,206.50,103.25,204.60);
- c(100.50,197.90,97.75,191.35,94.75,184.70);
- c(94.05,183.15,93.20,180.00,93.20,180.00);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]over=s[1];
- m(103.85,194.20);
- c(102.75,191.50,101.65,188.85,100.55,186.10);
- c(100.25,185.45,100.10,184.40,100.55,183.75);
- c(101.00,182.90,102.15,182.65,103.10,182.65);
- c(107.15,182.65,111.20,182.70,115.20,182.75);
- c(115.40,183.10,115.45,183.40,115.65,183.80);
- c(115.90,184.45,116.95,185.55,116.90,185.60);
- c(116.95,185.55,106.05,185.55,106.05,185.60);
- c(105.60,185.55,105.30,185.95,105.25,186.30);
- c(105.30,186.55,105.55,186.95,105.55,186.90);
- c(105.55,186.95,109.45,186.95,111.30,186.90);
- c(111.70,186.95,112.35,187.05,112.55,187.50);
- c(113.35,189.45,114.10,191.35,114.85,193.30);
- c(115.00,193.60,114.75,194.00,114.60,194.40);
- c(114.35,195.25,113.25,195.90,112.35,195.85);
- c(110.85,195.90,109.20,195.90,107.70,195.85);
- c(106.70,195.90,105.60,196.00,104.80,195.45);
- c(104.30,195.15,104.05,194.65,103.85,194.20);
- close_edge();
- m(107.60,192.20);
- c(107.20,191.25,106.80,190.20,106.35,189.35);
- c(106.30,189.20,106.55,189.10,106.60,189.05);
- c(107.45,189.10,108.55,188.85,108.80,189.50);
- c(109.20,190.35,109.45,191.10,109.80,191.95);
- c(109.85,192.10,109.85,192.35,109.60,192.40);
- c(109.20,192.35,108.70,192.50,108.20,192.45);
- c(108.05,192.50,107.70,192.35,107.60,192.20);
- close_edge();
- p=path();
- gc_color(0.00,0.00,0.00);
- gc_opacity(0.59);
- s[1]=draw(p);
- m(116.60,186.35);
- c(117.85,189.45,119.10,192.60,120.55,195.65);
- c(121.35,195.65,122.30,195.75,123.20,195.65);
- c(123.70,195.65,124.30,195.65,124.70,195.30);
- c(124.95,195.15,124.85,194.40,124.85,194.35);
- c(125.20,194.75,125.70,195.15,126.25,195.40);
- c(126.85,195.65,127.60,195.65,128.25,195.65);
- c(129.00,195.65,129.75,195.65,130.55,195.65);
- c(131.10,195.65,131.70,195.50,131.95,195.05);
- c(132.35,194.50,132.20,193.60,131.95,192.90);
- c(131.25,190.70,130.05,188.60,129.20,186.35);
- c(129.05,186.20,129.25,186.05,129.30,186.05);
- c(129.50,185.80,129.80,185.80,130.25,185.85);
- c(132.20,185.80,136.35,185.95,136.35,185.90);
- c(136.10,185.30,135.85,184.65,135.60,184.15);
- c(135.55,183.80,135.30,183.30,134.95,183.05);
- c(134.80,182.80,134.35,182.80,134.05,182.75);
- c(130.05,182.80,122.45,182.80,122.45,182.75);
- c(122.55,183.05,122.70,183.40,122.80,183.70);
- c(123.95,186.55,125.20,189.35,126.30,192.15);
- c(126.35,192.35,126.10,192.60,125.85,192.65);
- c(125.45,192.60,125.10,192.60,124.70,192.60);
- c(124.45,192.60,124.20,192.35,124.10,192.15);
- c(122.95,189.35,121.60,186.55,120.45,183.70);
- c(120.30,183.30,119.85,182.80,119.35,182.75);
- c(117.95,182.80,115.25,182.75,115.20,182.75);
- c(115.25,182.75,116.00,184.95,116.60,186.35);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(132.70,185.15);
- c(132.45,184.65,132.45,184.15,132.70,183.70);
- c(133.20,182.40,135.55,182.65,136.95,182.70);
- c(137.70,182.65,138.45,182.80,139.05,183.15);
- c(139.45,183.40,140.20,184.05,140.20,184.05);
- c(140.20,184.05,140.10,183.80,140.10,183.70);
- c(140.10,183.40,140.20,183.15,140.35,183.00);
- c(140.60,182.80,141.10,182.65,141.45,182.70);
- c(144.45,182.65,147.35,182.65,150.35,182.70);
- c(151.55,182.65,152.80,182.55,153.80,183.05);
- c(154.30,183.30,154.45,183.90,154.60,184.45);
- c(154.95,185.05,155.35,186.05,155.35,186.05);
- c(155.35,186.05,149.55,185.80,146.60,185.80);
- c(146.35,185.80,146.10,185.80,146.05,186.05);
- c(145.95,186.20,145.95,186.45,146.10,186.60);
- c(147.35,189.60,150.05,195.65,149.95,195.60);
- c(150.05,195.65,144.85,195.50,144.85,195.55);
- c(144.85,195.50,142.10,189.60,140.85,186.45);
- c(140.85,186.20,140.45,185.80,140.10,185.75);
- c(139.70,185.80,139.30,185.80,138.95,185.80);
- c(138.80,185.80,138.70,186.20,138.70,186.35);
- c(140.10,189.45,142.45,195.65,142.45,195.60);
- c(142.45,195.65,137.05,195.65,137.05,195.65);
- c(137.05,195.65,134.35,189.20,133.10,186.05);
- c(132.45,184.55,132.70,185.20,132.70,185.15);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(59.90,202.85);
- c(59.90,202.80,73.15,202.80,79.85,202.85);
- c(79.85,201.95,79.85,200.95,79.75,199.90);
- c(78.80,199.90,77.95,199.90,77.05,199.90);
- c(72.00,199.90,61.90,199.90,61.90,199.90);
- c(60.90,199.90,59.90,201.55,59.90,202.85);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(57.75,207.90);
- c(57.75,207.85,72.65,207.85,80.20,207.90);
- c(80.10,206.85,80.10,205.85,80.05,204.90);
- c(79.20,204.85,78.30,204.85,77.35,204.90);
- c(71.50,204.85,59.80,204.85,59.80,204.90);
- c(58.80,204.85,57.75,206.50,57.75,207.90);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(62.90,197.80);
- c(62.90,197.80,72.90,197.80,77.85,197.80);
- c(77.80,196.75,77.80,195.75,77.75,194.80);
- c(76.80,194.75,75.90,194.75,75.05,194.80);
- c(71.75,194.75,65.10,194.75,65.05,194.80);
- c(64.05,194.75,62.90,196.40,62.90,197.80);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(94.05,179.10);
- c(94.05,179.15,91.45,179.15,90.15,179.10);
- c(89.30,179.15,88.40,179.90,88.10,180.65);
- c(87.75,181.90,88.80,183.15,89.30,184.30);
- c(91.45,189.45,93.55,194.65,95.80,199.70);
- c(96.10,200.30,96.10,201.30,95.45,201.60);
- c(94.95,201.80,94.60,201.95,94.10,201.95);
- c(93.45,201.95,92.95,201.30,92.65,200.70);
- c(89.55,193.50,83.35,179.15,83.35,179.10);
- c(83.35,179.15,75.80,179.15,75.80,179.10);
- c(78.70,185.95,81.60,192.85,84.60,199.70);
- c(85.00,200.55,85.40,201.95,84.60,202.50);
- c(84.25,202.80,83.75,202.70,83.35,202.65);
- c(82.85,202.70,82.20,202.30,82.00,201.75);
- c(78.95,194.15,75.55,186.70,72.30,179.10);
- c(72.25,179.15,64.45,179.15,64.40,179.10);
- c(64.45,179.15,71.75,196.25,75.45,204.80);
- c(75.80,205.60,76.45,206.25,76.95,206.80);
- c(77.70,207.60,79.05,207.85,80.20,207.90);
- c(81.60,207.85,83.50,207.00,83.90,205.50);
- c(85.00,207.10,87.25,208.00,89.30,207.90);
- c(91.30,207.75,93.70,206.85,94.55,205.00);
- c(95.70,206.75,97.85,207.85,99.90,207.90);
- c(101.90,207.85,104.85,205.45,104.10,203.70);
- c(101.40,197.05,98.50,190.35,95.60,183.80);
- c(94.95,182.30,94.05,179.15,94.05,179.10);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]over=s[2];
- s[0]over=s[1];
- page:=s[0];
- s=NULL;
- #]page
- #]document
-